perm filename ECHO.FAI[206,JMC] blob sn#371348 filedate 1978-07-29 generic text, type T, neo UTF8
	TITLE ECHO
	A←1
	B←2
ST:	CALLI
	MOVE A,[POINT 7,BUFF]
L:	INCHRW B
	IDPB B,A		
	CAIE B,12
	JRST L
	MOVE A,[POINT 7,BUFF]
L1:	ILDB B,A
	OUTCHR B
	CAIE B,12
	JRST L1
	JRST ST
BUFF:	BLOCK 200
	END ST